home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-01
/
phmacro.zip
/
TEST2.OUT
< prev
next >
Wrap
Text File
|
1993-01-04
|
2KB
|
138 lines
fn: nam=<f> parms=<a> def=<i(x*(a))>
<ffffffff>
fn: nam=<j> parms=<a> def=<k(x*(a))>
<jjjjjjjj>
obj: nam=<z> def=<y[0]>
<zzzz>
obj: nam=<x> def=<2>
<x>
0: f(j(z)) 3 4 z
:
1: j(z)
:
1.1: z
:
1.1: y[0]
: zzzz
1R: j(_)
:
1R: k(x*(a))
: jjjjjjjj
hide-set #0 = {jz}
1R: k(x*(y[0]))
: jjjjj0000jj
1: k(x*(y[0]))
: jjjjj0000jj
hide-set #1 = {jx}
1: k(2*(y[0]))
: jj1jj0000jj
0R: f(_)
:
0R: i(x*(a))
: ffffffff
hide-set #2 = {fj}
hide-set #3 = {fjx}
hide-set #4 = {fjz}
0R: i(x*(k(2*(y[0]))))
: fffff22322444422ff
0: i(x*(k(2*(y[0])))) 3 4 z
: fffff22322444422ff
hide-set #5 = {fx}
0: i(2*(k(2*(y[0])))) 3 4 z
: ff5ff22322444422ff
0: i(2*(k(2*(y[0])))) 3 4 y[0]
: ff5ff22322444422ff zzzz
0: i(2*(k(2*(y[0])))) 3 4 y[0]
:
0:
:
0:
:
fn: nam=<h> parms=<g> def=<g>
<h>
fn: nam=<a> parms=<> def=<0>
<a>
obj: nam=<b> def=<()>
<bb>
obj: nam=<c> def=<a b>
<ccc>
0: h(c)
:
1: c
:
1: a b
: ccc
hide-set #6 = {bc}
1: a ()
: cc66
0R: h(_)
:
0R: g
: h
hide-set #7 = {ch}
hide-set #8 = {bch}
0R: a ()
: 7788
0: a ()
: 7788
0R: a()
:
0R: 0
: a
hide-set #9 = {ach}
0: 0
: 9
0: 0
:
0:
:
0:
:
fn: nam=<m> parms=<a> def=<<<#a>>>
<mmmmmm>
fn: nam=<n> parms=<a> def=<m(a)>
<nnnn>
0: m(1 2 3)
:
1: 1 2 3
:
0R: m(_)
:
0R: <<#a>>
: mmmmmm
string "1 2 3" --> ""
0R: <<"">>
: mmmmmm
0: <<"">>
: mmmmmm
0: <<"">>
:
0: m(z)
:
1: z
:
1: y[0]
: zzzz
0R: m(_)
:
0R: <<#a>>
: mmmmmm
string "z" --> ""
0R: <<"">>
: mmmmmm
0: <<"">>
: mmmmmm
0: <<"">>
:
0: n(z)
:
1: z
:
1: y[0]
: zzzz
0R: n(_)
:
0R: m(a)
: nnnn
too many hide-sets